// This example demonstrates how to place the client certificate in the platform-specific (Windows, Linux, ...) certificate // store. // // Find all latest examples here: https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . using System; using OpcLabs.EasyOpc.UA; using OpcLabs.EasyOpc.UA.Application; using OpcLabs.EasyOpc.UA.OperationModel; namespace UADocExamples._UAApplicationManifest { class InstanceOwnStorePath { public static void PlatformSpecific() { UAEndpointDescriptor endpointDescriptor = "opc.tcp://opcua.demo-this.com:51210/UA/SampleServer"; // or "http://opcua.demo-this.com:51211/UA/SampleServer" (currently not supported) // or "https://opcua.demo-this.com:51212/UA/SampleServer/" // Set the application certificate store path, which determines the location of the client certificate. // Note that this only works once in each host process. EasyUAApplication.Instance.ApplicationParameters.ApplicationManifest.InstanceOwnStorePath = "CurrentUser\\My"; // Do something - invoke an OPC read, to trigger creation of the certificate. var client = new EasyUAClient(); try { client.ReadValue(endpointDescriptor, "nsu=http://test.org/UA/Data/ ;i=10853"); } catch (UAException uaException) { Console.WriteLine("*** Failure: {0}", uaException.GetBaseException().Message); } // The certificate will be located or created in the specified platform-specific certificate store. // On Windows, when viewed by the certmgr.msc tool, it will be under // Certificates - Current User -> Personal -> Certificates. Console.WriteLine("Finished."); } } }
# This example demonstrates how to place the client certificate in the platform-specific (Windows, Linux, ...) # certificate store. # # Find all latest examples here: https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . # OPC client and subscriber examples in Python on GitHub: https://github.com/OPCLabs/Examples-QuickOPC-Python . # The QuickOPC package is needed. Install it using "pip install opclabs_quickopc". import opclabs_quickopc # Import .NET namespaces. from OpcLabs.EasyOpc.UA import * from OpcLabs.EasyOpc.UA.Application import * from OpcLabs.EasyOpc.UA.OperationModel import * endpointDescriptor = UAEndpointDescriptor('opc.tcp://opcua.demo-this.com:51210/UA/SampleServer') # or 'http://opcua.demo-this.com:51211/UA/SampleServer' (currently not supported) # or 'https://opcua.demo-this.com:51212/UA/SampleServer/' # Set the application certificate store path, which determines the location of the client certificate. # Note that this only works once in each host process. EasyUAApplication.Instance.ApplicationParameters.ApplicationManifest.InstanceOwnStorePath = 'CurrentUser\\My' # Do something - invoke an OPC read, to trigger creation of the certificate. client = EasyUAClient() try: value = IEasyUAClientExtension.ReadValue(client, endpointDescriptor, UANodeDescriptor('nsu=http://test.org/UA/Data/ ;i=10853')) except UAException as uaException: print('*** Failure: ' + uaException.GetBaseException().Message) # The certificate will be located or created in the specified platform-specific certificate store. # On Windows, when viewed by the certmgr.msc tool, it will be under # Certificates - Current User -> Personal -> Certificates. print('Finished.')
' This example demonstrates how to place the client certificate in the platform-specific (Windows, Linux, ...) certificate store. ' ' Find all latest examples here: https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . Imports OpcLabs.EasyOpc.UA Imports OpcLabs.EasyOpc.UA.Application Imports OpcLabs.EasyOpc.UA.OperationModel Namespace _UAApplicationManifest Friend Class InstanceOwnStorePath Public Shared Sub PlatformSpecific() ' Define which server we will work with. Dim endpointDescriptor As UAEndpointDescriptor = "opc.tcp://opcua.demo-this.com:51210/UA/SampleServer" ' or "http://opcua.demo-this.com:51211/UA/SampleServer" (currently not supported) ' or "https://opcua.demo-this.com:51212/UA/SampleServer/" ' Set the application certificate store path, which determines the location of the client certificate. ' Note that this only works once in each host process. EasyUAApplication.Instance.ApplicationParameters.ApplicationManifest.InstanceOwnStorePath = "CurrentUser\\My" ' Do something - invoke an OPC read, to trigger creation of the certificate. Dim client = New EasyUAClient() Try client.ReadValue(endpointDescriptor, "nsu=http://test.org/UA/Data/ ;i=10853") Catch uaException As UAException Console.WriteLine("*** Failure: {0}", uaException.GetBaseException.Message) End Try ' The certificate will be located or created in the specified platform-specific certificate store. ' On Windows, when viewed by the certmgr.msc tool, it will be under ' Certificates - Current User -> Personal -> Certificates. Console.WriteLine("Finished.") End Sub End Class End Namespace
// This example demonstrates how to place the client certificate // in the platform-specific (Windows, Linux, ...) certificate store. // // Find all latest examples here : https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . class procedure InstanceOwnStorePath.PlatformSpecific; var Application: TEasyUAApplication; Client: OpcLabs_EasyOpcUA_TLB._EasyUAClient; ClientManagement: TEasyUAClientManagement; Value: OleVariant; begin // The configuration object allows access to static behavior. ClientManagement := TEasyUAClientManagement.Create(nil); ClientManagement.Connect; // Obtain the application interface. Application := TEasyUAApplication.Create(nil); // Set the application certificate store path, which determines the location of the client certificate. // Note that this only works once in each host process. Application.ApplicationParameters.ApplicationManifest.InstanceOwnStorePath := 'CurrentUser\My'; // Do something - invoke an OPC read, to trigger creation of the certificate. Client := CoEasyUAClient.Create; try Value := Client.ReadValue( //'http://opcua.demo-this.com:51211/UA/SampleServer', //'https://opcua.demo-this.com:51212/UA/SampleServer/', 'opc.tcp://opcua.demo-this.com:51210/UA/SampleServer', 'nsu=http://test.org/UA/Data/ ;i=10853'); except on E: EOleException do begin WriteLn(Format('*** Failure: %s', [E.GetBaseException.Message])); end; end; // The certificate will be located or created in the specified platform-specific certificate store. // On Windows, when viewed by the certmgr.msc tool, it will be under // Certificates - Current User -> Personal -> Certificates. WriteLn('Finished...'); FreeAndNil(Application); FreeAndNil(ClientManagement); end;
// This example demonstrates how to place the client certificate // in the platform-specific (Windows, Linux, ...) certificate store. // // Find all latest examples here : https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . // Obtain the application interface. $Application = new COM("OpcLabs.EasyOpc.UA.Application.EasyUAApplication"); // Set the application certificate store path, which determines the location of the client certificate. // Note that this only works once in each host process. $Application->ApplicationParameters->ApplicationManifest->InstanceOwnStorePath = "CurrentUser\My"; // Do something - invoke an OPC read, to trigger creation of the certificate. $Client = new COM("OpcLabs.EasyOpc.UA.EasyUAClient"); try { $value = $Client->ReadValue( //"http://opcua.demo-this.com:51211/UA/SampleServer", "opc.tcp://opcua.demo-this.com:51210/UA/SampleServer", "nsu=http://test.org/UA/Data/ ;i=10853"); } catch (com_exception $e) { printf("*** Failure: %s\n", $e->getMessage()); } // The certificate will be located or created in the specified platform-specific certificate store. // On Windows, when viewed by the certmgr.msc tool, it will be under // Certificates - Current User -> Personal -> Certificates. printf("Finished.\n");
REM This example demonstrates how to place the client certificate REM in the platform-specific (Windows, Linux, ...) certificate store. REM REM Find all latest examples here : https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . Private Sub InstanceOwnStorePath_PlatformSpecific_Command_Click() OutputText = "" ' Obtain the application interface Dim Application As New EasyUAApplication ' Set the application certificate store path, which determines the location of the client certificate. ' Note that this only works once in each host process. Application.ApplicationParameters.ApplicationManifest.InstanceOwnStorePath = "CurrentUser\My" ' Do something - invoke an OPC read, to trigger creation of the certificate. Dim client As New EasyUAClient On Error Resume Next Dim value As Variant value = client.ReadValue("opc.tcp://opcua.demo-this.com:51210/UA/SampleServer", "nsu=http://test.org/UA/Data/ ;i=10853") If Err.Number <> 0 Then OutputText = OutputText & "*** Failure: " & Err.Source & ": " & Err.Description & vbCrLf Exit Sub End If On Error GoTo 0 ' The certificate will be located or created in the specified platform-specific certificate store. ' On Windows, when viewed by the certmgr.msc tool, it will be under ' Certificates - Current User -> Personal -> Certificates. OutputText = OutputText & "Finished..." & vbCrLf End Sub
Rem This example demonstrates how to place the client certificate in the platform-specific (Windows, Linux, ...) certificate Rem store. Rem Note: COM is only available on Windows. Rem Rem Find all latest examples here : https://opclabs.doc-that.com/files/onlinedocs/OPCLabs-OpcStudio/Latest/examples.html . Option Explicit WScript.Echo "Obtaining the application interface..." Dim Application: Set Application = CreateObject("OpcLabs.EasyOpc.UA.Application.EasyUAApplication") ' Set the application certificate store path, which determines the location of the client certificate. ' Note that this only works once in each host process. WScript.Echo "Setting the application certificate store path..." Application.ApplicationParameters.ApplicationManifest.InstanceOwnStorePath = "CurrentUser\My" WScript.Echo "Creating a client object..." Dim Client: Set Client = CreateObject("OpcLabs.EasyOpc.UA.EasyUAClient") ' Do something - invoke an OPC read, to trigger some loggable entries. WScript.Echo "Reading a value..." On Error Resume Next Dim value: value = Client.ReadValue("opc.tcp://opcua.demo-this.com:51210/UA/SampleServer", "nsu=http://test.org/UA/Data/ ;i=10853") If Err.Number <> 0 Then WScript.Echo "*** Failure: " & Err.Source & ": " & Err.Description WScript.Quit End If On Error Goto 0 ' The certificate will be located or created in the specified platform-specific certificate store. ' On Windows, when viewed by the certmgr.msc tool, it will be under ' Certificates - Current User -> Personal -> Certificates. WScript.Echo "Finished."
Copyright © 2004-2024 CODE Consulting and Development, s.r.o., Plzen. All rights reserved.
Send Documentation Feedback. Technical Support